function set_units(units)

h = findobj('Tag', 'IUnits');
set(h, 'Value', units);
return;
